home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
How Would You Survive?
/
How Would You Survive (1995)(Grolier)[Mac-PC].iso
/
mac
/
VIKINGW.DIR
/
01654_Script_Town
< prev
next >
Wrap
Text File
|
1995-09-12
|
4KB
|
136 lines
global gbeenclicked, gQuest
on VTownRollovers
set gbeenclicked = 0
if (not(CheckClickedStatus(gQuest))) then
if rollover(7) then
VikingCursor
repeat while rollover(7)
if (the mousedown) then
set gbeenclicked = 1
else
if gbeenclicked = 1 then
puppetsprite 7, true
puppetsound "SV220101.AIF"
updatestage
wait .5
set the locH of sprite 7 = -404
updatestage
end if
end if
end repeat
else
if rollover(8) then
ArrowCursor
repeat while rollover(8)
set the locH of sprite 9 to 407
set the locV of sprite 9 to 145
updatestage
end repeat
set the locH of sprite 9 to 999
updatestage
else
if rollover(10) then
ArrowCursor
repeat while rollover(10)
set the locH of sprite 11 to 553
set the locV of sprite 11 to 269
updatestage
end repeat
set the locH of sprite 11 to 999
updatestage
else
if rollover(12) then
ArrowCursor
resethouse
repeat while rollover(12)
set the locH of sprite 13 to 409
set the locV of sprite 13 to 259
updatestage
end repeat
set the locH of sprite 13 to 999
updatestage
else
if rollover(14) then
ArrowCursor
resethouse
repeat while rollover(14)
set the locH of sprite 15 to 378
set the locV of sprite 15 to 353
updatestage
end repeat
set the locH of sprite 15 to 999
updatestage
else
if rollover(16) then
ArrowCursor
repeat while rollover(16)
set the locH of sprite 17 to 193
set the locV of sprite 17 to 380
updatestage
end repeat
set the locH of sprite 17 to 999
updatestage
else
if rollover(18) then
ArrowCursor
repeat while rollover(18)
set the locH of sprite 19 to 229
set the locV of sprite 19 to 318
updatestage
end repeat
set the locH of sprite 19 to 999
updatestage
else
if rollover(20) then
ArrowCursor
resethouse
repeat while rollover(20)
set the locH of sprite 21 to 462
set the locV of sprite 21 to 333
updatestage
end repeat
set the locH of sprite 21 to 999
updatestage
else
if rollover(26) then
ArrowCursor
repeat while rollover(26)
set the locH of sprite 27 to 358
set the locV of sprite 27 to 321
updatestage
end repeat
set the locH of sprite 27 to 999
updatestage
else
if rollover(41) then
HandCursor
else
if rollover(42) then
HandCursor
else
ArrowCursor
end if
end if
end if
end if
end if
end if
end if
end if
end if
end if
end if
end if
RandomQuestion(gQuest)
end
on resethouse
set the locV of sprite 7 = 304
set the locH of sprite 7 = 470
puppetsprite 7, false
updatestage
end